$PBExportHeader$cat_error_db.sru
$PBExportComments$Estructura que contiene datos sobre el error producido en la Base de Datos.
forward
global type cat_error_db from nonvisualobject
end type
end forward

global type cat_error_db from nonvisualobject autoinstantiate
end type

type variables
/* Utilizado cuando ocurre un error al grabar en la Base de Datos */
Integer	sqldbcode    /* Nro de Error */
String	sqlerrtext      /* Descripcion del Error*/
Integer       UserErrorCode       /* Codigo de error  personalizado */
String       UserErrorText        /* Texto personalizado de error */
end variables

on cat_error_db.create
TriggerEvent( this, "constructor" )
end on

on cat_error_db.destroy
TriggerEvent( this, "destructor" )
end on

